home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / stk-3.002 / stk-3 / STk-3.1 / Contrib / STk-wtour / lessons / pack1.stk < prev    next >
Encoding:
Text File  |  1994-08-24  |  267 b   |  10 lines
  1. ;; Basic geometry management with the packer
  2.  
  3. (label '.l1 :text "Label #1" :background "red")
  4. (label '.l2 :text "Label #2" :background "blue")
  5. (label '.l3 :text "Label #3" :background "green")
  6.  
  7. (pack .l1 :side "top")
  8. (pack .l2 :side "left")
  9. (pack .l3 :side "bottom")
  10.